(auto-mode-alist): Add uppercase version of archive

mode file name extensions ARC, ZIP, LXH, ZOO.

diff --git a/lisp/files.el b/lisp/files.el
index 27200b04803031ac13b409632fe40ab6f111bf5b..6ca1b5a7c8b2bb7dc63abb8ecff8c44b2cf61915 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -989,6 +989,7 @@ run `normal-mode' explicitly."
     ("\\.prolog\\'" . prolog-mode)
     ("\\.tar\\'" . tar-mode)
     ("\\.\\(arc\\|zip\\|lzh\\|zoo\\)\\'" . archive-mode)
+    ("\\.\\(ARC\\|ZIP\\|LZH\\|ZOO\\)\\'" . archive-mode)
     ;; Mailer puts message to be edited in
     ;; /tmp/Re.... or Message
     ("\\`/tmp/Re" . text-mode)